home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / djgpp / contrib / pdcurs22 / src / private / pdcsetsc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-01-26  |  11.4 KB  |  522 lines
  1. /*
  2. ***************************************************************************
  3. * This file comprises part of PDCurses. PDCurses is Public Domain software.
  4. * You may use this code for whatever purposes you desire. This software
  5. * is provided AS IS with NO WARRANTY whatsoever.
  6. * Should this software be used in another application, an acknowledgement
  7. * that PDCurses code is used would be appreciated, but is not mandatory.
  8. *
  9. * Any changes which you make to this software which may improve or enhance
  10. * it, should be forwarded to the current maintainer for the benefit of 
  11. * other users.
  12. *
  13. * The only restriction placed on this code is that no distribution of
  14. * modified PDCurses code be made under the PDCurses name, by anyone
  15. * other than the current maintainer.
  16. * 
  17. * See the file maintain.er for details of the current maintainer.
  18. ***************************************************************************
  19. */
  20. #define    CURSES_LIBRARY    1
  21. #include <curses.h>
  22.  
  23. #ifdef PDCDEBUG
  24. char *rcsid_PDCsetsc  = "$Id$";
  25. #endif
  26.  
  27. /*man-start*********************************************************************
  28.  
  29.   PDC_set_80x25()    - force a known screen state: 80x25 text mode.
  30.  
  31.   PDCurses Description:
  32.      This is a private PDCurses function.
  33.  
  34.      Forces the appropriate 80x25 alpha mode given the display adapter.
  35.  
  36.      Since we currently do not support changing the virtual console size,
  37.      this routine is a NOP under Flexos.
  38.  
  39.   PDCurses Return Value:
  40.      This function returns OK upon success otherwise ERR is returned.
  41.  
  42.   PDCurses Errors:
  43.      No errors are defined for this routine.
  44.  
  45.   Portability:
  46.      PDCurses    int    PDC_set_80x25( void );
  47.  
  48. **man-end**********************************************************************/
  49.  
  50. int    PDC_set_80x25(void)
  51. {
  52. #if defined( OS2 ) && !defined( EMXVIDEO )
  53.     VIOMODEINFO modeInfo={0};
  54. #endif
  55.  
  56. #ifdef PDCDEBUG
  57.     if (trace_on) PDC_debug("PDC_set_80x25() - called\n");
  58. #endif
  59.  
  60. #ifdef    FLEXOS
  61.     return( OK );
  62. #endif
  63.  
  64. #ifdef    DOS
  65.     switch (_cursvar.adapter)
  66.     {
  67.     case _CGA:
  68.     case _EGACOLOR:
  69.     case _EGAMONO:
  70.     case _VGACOLOR:
  71.     case _VGAMONO:
  72.     case _MCGACOLOR:
  73.     case _MCGAMONO:
  74.         regs.h.ah = 0x00;
  75.         regs.h.al = 0x03;
  76.         int86(0x10, ®s, ®s);
  77.         break;
  78.     case _MDA:
  79.         regs.h.ah = 0x00;
  80.         regs.h.al = 0x07;
  81.         int86(0x10, ®s, ®s);
  82.     default:
  83.         break;
  84.     }
  85.     return( OK );
  86. #endif
  87.  
  88. #ifdef    OS2
  89. # ifdef EMXVIDEO
  90.     return( OK );
  91. # else
  92.     modeInfo.cb = sizeof(modeInfo);
  93.     /* set most parameters of modeInfo */
  94.     VioGetMode(&modeInfo, 0);
  95.     modeInfo.fbType = 1;
  96.     VioSetMode(&modeInfo, 0);
  97. # endif
  98. #endif
  99.  
  100. #ifdef UNIX
  101. /* INCOMPLETE */
  102. #endif
  103. }
  104.  
  105. /*man-start*********************************************************************
  106.  
  107.   PDC_set_cursor_mode()    - Set the cursor start and stop scan lines.
  108.  
  109.   PDCurses Description:
  110.      Sets the cursor type to begin in scan line startrow and end in
  111.      scan line endrow.  Both values should be 0-31.
  112.  
  113.   PDCurses Return Value:
  114.      This function returns OK on success and ERR on error.
  115.  
  116.   PDCurses Errors:
  117.      No errors are defined for this function.
  118.  
  119.   Portability:
  120.      PDCurses    int PDC_set_cursor_mode( int startrow, int endrow );
  121.  
  122. **man-end**********************************************************************/
  123.  
  124. int    PDC_set_cursor_mode( int startrow, int endrow )
  125. {
  126. #ifdef    OS2
  127. # ifndef EMXVIDEO
  128.     VIOCURSORINFO cursorInfo={0};
  129. # endif
  130. #endif
  131.  
  132. #ifdef    FLEXOS
  133.     unsigned short mybuff = 0;
  134. #endif
  135.  
  136. #ifdef PDCDEBUG
  137.     if (trace_on) PDC_debug("PDC_set_cursor_mode() - called: startrow %d endrow %d\n",startrow,endrow);
  138. #endif
  139.  
  140. #ifdef    FLEXOS
  141.     /*
  142.      * Under FLEXOS, this routine translates the input parameters in the
  143.      * following way:
  144.      *
  145.      * startrow --> visible_cursor endrow     -->    cursor type:
  146.      * underline = 0; block = 1;
  147.      *
  148.      * VCWM_CURSOR       0x0100       bit - 8 Cursor off VCWM_BLOCK    
  149.      * 0x0200       bit - 9 Block Cursor    
  150.      *
  151.      */
  152.     retcode = s_getfield(T_VIRCON, VC_MODE, 1L, (void far *) &mybuff, 2L);
  153.     if (retcode < 0L)
  154.         return( ERR );
  155.     if (startrow)
  156.         mybuff &= ~VCWM_CURSOR;
  157.     else
  158.         mybuff |= VCWM_CURSOR;
  159.  
  160.     if (endrow)
  161.         mybuff |= VCWM_BLOCK;
  162.     else
  163.         mybuff &= ~VCWM_BLOCK;
  164.  
  165.     retcode = s_setfield(T_VIRCON, VC_MODE, 1L, (void far *) &mybuff, 2L);
  166.     return( (retcode < 0L) ? ERR : OK );
  167. #endif
  168.  
  169. #ifdef    DOS
  170.     regs.h.ah = 0x01;
  171.     regs.h.ch = (unsigned char) startrow;
  172.     regs.h.cl = (unsigned char) endrow;
  173.     int86(0x10, ®s, ®s);
  174.     return( OK );
  175. #endif
  176.  
  177. #ifdef    OS2
  178. # ifdef EMXVIDEO
  179.     if (endrow <= startrow)
  180.         v_hidecursor();
  181.     else
  182.         v_ctype (startrow, endrow);
  183.     return( OK );
  184. # else
  185.     cursorInfo.yStart = startrow;
  186.     cursorInfo.cEnd = endrow;
  187.     cursorInfo.cx = 1;
  188.     cursorInfo.attr = 0;
  189.     return (VioSetCurType (&cursorInfo, 0) == 0);
  190. # endif
  191. #endif
  192.  
  193. #ifdef UNIX
  194.     return(0); /* this is N/A */
  195. #endif
  196. }
  197.  
  198. /*man-start*********************************************************************
  199.  
  200.   PDC_set_font()    - sets the current font size
  201.  
  202.   PDCurses Description:
  203.      This is a private PDCurses function.
  204.  
  205.      This routine sets the current font size, if the adapter allows
  206.      such a change.
  207.  
  208.   PDCurses Return Value:
  209.      This function returns OK upon success otherwise ERR is returned.
  210.  
  211.   PDCurses Errors:
  212.      It is an error to attempt to change the font size on a "bogus"
  213.      adapter.  The reason for this is that we have a known video
  214.      adapter identity problem.  e.g. Two adapters report the same
  215.      identifying characteristics.
  216.  
  217.      It is also an error to attempt to change the size of the Flexos
  218.      console (as there is currently no support for that).
  219.  
  220.   Portability:
  221.      PDCurses    int    PDC_set_font( int size );
  222.  
  223. **man-end**********************************************************************/
  224.  
  225. int    PDC_set_font(int size)
  226. {
  227. #ifdef    OS2
  228. # ifndef EMXVIDEO
  229.     VIOMODEINFO modeInfo={0};
  230. # endif
  231. #endif
  232.  
  233. #ifdef PDCDEBUG
  234.     if (trace_on) PDC_debug("PDC_set_font() - called\n");
  235. #endif
  236.  
  237. #ifdef    FLEXOS
  238.     return( ERR );
  239. #endif
  240.  
  241. #ifdef    DOS
  242.     if (_cursvar.bogus_adapter)
  243.         return( ERR );
  244.  
  245.     switch (_cursvar.adapter)
  246.     {
  247.     case _CGA:
  248.     case _MDA:
  249.     case _MCGACOLOR:
  250.     case _MCGAMONO:
  251.     case _MDS_GENIUS:
  252.         break;
  253.  
  254.     case _EGACOLOR:
  255.     case _EGAMONO:
  256.         if (_cursvar.sizeable && (_cursvar.font != size))
  257.         {
  258.             switch (size)
  259.             {
  260.             case _FONT8:
  261.                 regs.h.ah = 0x11;
  262.                 regs.h.al = 0x12;
  263.                 regs.h.bl = 0x00;
  264.                 int86(0x10, ®s, ®s);
  265.                 break;
  266.             case _FONT14:
  267.                 regs.h.ah = 0x11;
  268.                 regs.h.al = 0x11;
  269.                 regs.h.bl = 0x00;
  270.                 int86(0x10, ®s, ®s);
  271.                 break;
  272.             default:
  273.                 break;
  274.             }
  275.         }
  276.         break;
  277.  
  278.     case _VGACOLOR:
  279.     case _VGAMONO:
  280.         if (_cursvar.sizeable && (_cursvar.font != size))
  281.         {
  282.             switch (size)
  283.             {
  284.             case _FONT8:
  285.                 regs.h.ah = 0x11;
  286.                 regs.h.al = 0x12;
  287.                 regs.h.bl = 0x00;
  288.                 int86(0x10, ®s, ®s);
  289.                 break;
  290.             case _FONT14:
  291.                 regs.h.ah = 0x11;
  292.                 regs.h.al = 0x11;
  293.                 regs.h.bl = 0x00;
  294.                 int86(0x10, ®s, ®s);
  295.                 break;
  296.             case _FONT16:
  297.                 regs.h.ah = 0x11;
  298.                 regs.h.al = 0x14;
  299.                 regs.h.bl = 0x00;
  300.                 int86(0x10, ®s, ®s);
  301.                 break;
  302.             default:
  303.                 break;
  304.             }
  305.         }
  306.         break;
  307.     default:
  308.         break;
  309.     }
  310.     if (_cursvar.visible_cursor)
  311.         PDC_cursor_on();
  312.     else
  313.         PDC_cursor_off();
  314.     _cursvar.font = PDC_get_font();
  315.     return( OK );
  316. #endif
  317.  
  318. #ifdef    OS2
  319. # ifndef EMXVIDEO
  320.     if (_cursvar.sizeable && (_cursvar.font != size))
  321.     {
  322.            modeInfo.cb = sizeof(modeInfo);
  323.            /* set most parameters of modeInfo */
  324.            VioGetMode(&modeInfo, 0);
  325.            modeInfo.cb = 8;     /* ignore horiz an vert resolution */
  326.                modeInfo.row = modeInfo.vres / size;
  327.            VioSetMode(&modeInfo, 0);
  328.     }
  329.     if (_cursvar.visible_cursor)
  330.         PDC_cursor_on();
  331.     else
  332.         PDC_cursor_off();
  333.     _cursvar.font = PDC_get_font();
  334. # endif
  335.     return( OK );
  336. #endif
  337.  
  338. #ifdef UNIX
  339.     return(OK); /* this is N/A */
  340. #endif
  341. }
  342.  
  343. /*man-start*********************************************************************
  344.  
  345.   PDC_set_rows()    - sets the physical number of rows on screen
  346.  
  347.   PDCurses Description:
  348.      This is a private PDCurses function.
  349.  
  350.      This routine attempts to set the number of rows on the physical
  351.      screen to the passed value.
  352.  
  353.   PDCurses Return Value:
  354.      This function returns OK upon success otherwise ERR is returned.
  355.  
  356.   PDCurses Errors:
  357.      It is an error to attempt to change the screen size on a "bogus"
  358.      adapter.  The reason for this is that we have a known video
  359.      adapter identity problem.  e.g. Two adapters report the same
  360.      identifying characteristics.
  361.  
  362.      It is also an error to attempt to change the size of the Flexos
  363.      console (as there is currently no support for that).
  364.  
  365.   Portability:
  366.      PDCurses    int    PDC_set_rows( int rows );
  367.  
  368. **man-end**********************************************************************/
  369.  
  370. int    PDC_set_rows(int rows)
  371. {
  372. #ifdef    OS2
  373. # ifndef EMXVIDEO
  374.     VIOMODEINFO modeInfo={0};
  375.     USHORT result=0;
  376. # endif
  377. #endif
  378.  
  379. #ifdef PDCDEBUG
  380.     if (trace_on) PDC_debug("PDC_set_rows() - called\n");
  381. #endif
  382.  
  383. #ifdef    FLEXOS
  384.     return( ERR );
  385. #endif
  386.  
  387. #ifdef    DOS
  388.     if (_cursvar.bogus_adapter)
  389.         return( ERR );
  390.  
  391.     switch (_cursvar.adapter)
  392.     {
  393.     case _EGACOLOR:
  394.     case _EGAMONO:
  395.         if (rows < 43)
  396.             PDC_set_font(_FONT14);
  397.         else
  398.             PDC_set_font(_FONT8);
  399.         break;
  400.  
  401.     case _VGACOLOR:
  402.     case _VGAMONO:
  403.         if (rows < 28)
  404.             PDC_set_font(_FONT16);
  405.         else
  406.         if (rows < 50)
  407.             PDC_set_font(_FONT14);
  408.         else
  409.             PDC_set_font(_FONT8);
  410.         break;
  411.  
  412.     case _MCGACOLOR:
  413.     case _MCGAMONO:
  414.     case _MDA:
  415.     case _CGA:
  416.     case _MDS_GENIUS:
  417.     default:
  418.         break;
  419.     }
  420.     _cursvar.font = PDC_get_font();
  421.     LINES = PDC_get_rows();
  422.     COLS = PDC_get_columns();
  423.     return( OK );
  424. #endif
  425.  
  426. #ifdef    OS2
  427. # ifdef EMXVIDEO
  428.     return (ERR);
  429. # else
  430.     modeInfo.cb = sizeof(modeInfo);
  431.     /* set most parameters of modeInfo */
  432.     VioGetMode(&modeInfo, 0);
  433.     modeInfo.fbType = 1;
  434.     modeInfo.row = rows;
  435.     result = VioSetMode(&modeInfo, 0);
  436.     _cursvar.font = PDC_get_font();
  437.     LINES = PDC_get_rows();
  438.     COLS = PDC_get_columns();
  439.     return ((result == 0) ? OK : ERR);
  440. # endif
  441. #endif
  442.  
  443. #ifdef UNIX
  444.     return(0); /* this is N/A */
  445. #endif
  446. }
  447.  
  448. /*man-start*********************************************************************
  449.  
  450.   PDC_set_scrn_mode()    - Set BIOS Video Mode
  451.  
  452.   PDCurses Description:
  453.      Sets the BIOS Video Mode Number ONLY if it is different from
  454.      the current video mode.  This routine is for DOS systems only.
  455.  
  456.   PDCurses Return Value:
  457.      This function returns OK on success and ERR on error.
  458.  
  459.   PDCurses Errors:
  460.      No errors are defined for this function.
  461.  
  462.   Portability:
  463.      PDCurses    int PDC_set_scrn_mode( int new_mode );
  464.  
  465. **man-end**********************************************************************/
  466.  
  467. #if defined( OS2 ) && !defined( EMXVIDEO )
  468. int    PDC_set_scrn_mode(VIOMODEINFO new_mode)
  469. #else
  470. int    PDC_set_scrn_mode(int new_mode)
  471. #endif
  472. {
  473.  
  474. #ifdef    DOS
  475.     int    cur=0;
  476. #endif
  477.  
  478. #ifdef PDCDEBUG
  479.     if (trace_on) PDC_debug("PDC_set_scrn_mode() - called\n");
  480. #endif
  481.  
  482. #ifdef    FLEXOS
  483.     return( OK );
  484. #endif
  485.  
  486. #ifdef    DOS
  487.     cur = (int) PDC_get_scrn_mode();
  488.     if (cur != new_mode)
  489.     {
  490.         regs.h.ah = 0x00;
  491.         regs.h.al = (char) new_mode;
  492.         int86(0x10, ®s, ®s);
  493.     }
  494.     _cursvar.font = PDC_get_font();
  495.     _cursvar.scrnmode = new_mode;
  496.     LINES = PDC_get_rows();
  497.     COLS = PDC_get_columns();
  498.     return( OK );
  499. #endif
  500.  
  501. #ifdef    OS2
  502. # ifdef EMXVIDEO
  503.     return ( OK );
  504. # else
  505.     if (VioSetMode (&new_mode, 0) != 0)
  506.         {
  507.         _cursvar.font = PDC_get_font();
  508.         _cursvar.scrnmode = new_mode;
  509.         LINES = PDC_get_rows();
  510.         COLS = PDC_get_columns();
  511.         return( OK );
  512.         }
  513.     else
  514.         return (ERR);
  515. # endif
  516. #endif
  517.  
  518. #ifdef UNIX
  519.     return(OK); /* this is N/A */
  520. #endif
  521. }
  522.